﻿Public Class Form_SearchLookupEdit

    Private Sub Form_SearchLookupEdit_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'PcvgppDataSet.khachhang' table. You can move, or remove it, as needed.
        Me.KhachhangTableAdapter.Fill(Me.PcvgppDataSet.khachhang)

    End Sub

    Private Sub SearchLookUpEdit1_EditValueChanging(sender As Object, e As DevExpress.XtraEditors.Controls.ChangingEventArgs) Handles SearchLookUpEdit1.EditValueChanging
        Dim rowHandle As Integer = SearchLookUpEdit1.Properties.GetIndexByKeyValue(e.NewValue)
        Me.TextEdit1.EditValue = SearchLookUpEdit1.Properties.View.GetRowCellValue(rowHandle, "diachi")
    End Sub
End Class